home *** CD-ROM | disk | FTP | other *** search
/ RISC User... in a Nutshell / RISC User... in a Nutshell.iso / !Nutshell / !OvnPro / Applets / !HiWorld / Library / HelloWorld
Encoding:
Text File  |  1998-02-07  |  449 b   |  28 lines
  1. // HelloWorld v1.00 (2/2/98)
  2. //
  3. // Inserts "Hello World" into an Ovation Pro Document
  4. //
  5. // Tony Howat, (c) Risc User 1998
  6.  
  7.  
  8. // deal with 'Hello World' menu entry
  9.  
  10. int helloworld_entry(int entry, int subcode)
  11. {
  12.   string s;
  13.  
  14.   s="{HIWORLD_00}";
  15.   translate(s);
  16.  
  17.   type(s);
  18.   return(0);
  19. }
  20.  
  21. // add our option to the applet menu
  22.  
  23. void main(void)
  24. {
  25.   script_menu_initialise();
  26.   addentry_menu(script_handle,"helloworld_entry","","","","{HIWORLD_00}");
  27. }
  28.